<init>
subevent(mapinit,);
#evflag(enzyj,==,2); if(nowres); mc(1,enegr,+=,(`RCc(2),`RKh(2),`RÂ(2),`R]EN(2),aRCc,aRKh,aRÂ,aR]EN,bRCc,bRKh,bRÂ,bR]EN,Kpf(5),S[(5),VWFbv(5))); endif;


#O
<out>
fade(out,(type=fade,color=000000,wait=16)); fc(*actor,move,36,-25,center); fc(*actor,dir,=,d); fc(*actor,float,=,0); changemap(tB[h); fade(in,(type=fade,color=000000,wait=16));


#{aPe
<to1>
evflagsw(ct_valaback,=,0);
evflagsw(pr_caslidou,==,0); if(nowres);
evflagsw(pr_caslidou,=,1); text(1,(face=uam,swait=-1),ړuғoI);
endif;
#label(1); fade(out,(type=fade,color=000000,wait=16)); changemap(ip[{a); fade(in,(type=fade,color=000000,wait=16));
label(1); fade(out,(type=voltex(-3,0),color=000000,wait=32)); changemap(ip[{a); fade(in,(type=voltex(-3,0),color=000000,wait=32));


#{aRe
<to3>
fade(out,(type=fade,color=000000,wait=16)); changemap(ip[{aRe); fade(in,(type=fade,color=000000,wait=16));


#om[p
<valanorpa>
while;
fc(*target,y,<,-6); if(nowres); fc(*target,walk,0,8,0,1,d); return; next; endif;
fc(*target,y,>,-6); if(nowres); fc(*target,walk,0,8,0,-1,d); return; next; endif;
fc(*actor,y,<,fc(*target,y)+1); if(nowres); fc(*actor,walk,0,8,0,1,d); return; next; endif;
fc(*actor,y,>,fc(*target,y)+1); if(nowres); fc(*actor,walk,0,8,0,-1,u); return; next; endif;
fc(*actor,x,<,fc(*target,x)); if(nowres); fc(*actor,walk,0,8,1,0,r); return; next; endif;
fc(*actor,x,>,fc(*target,x)); if(nowres); fc(*actor,walk,0,8,-1,0,l); return; next; endif;
wend;
fc(*actor,walk,0,8,0,0,u); fc(*target,walk,0,8,0,0,d);

#fc(dir,*actor,==,0); if(nowres); fc(walk,*actor,0,8,0,1,2); return; fc(walk,*actor,0,8,1,0,0); return;
#else; fc(dir,*actor,==,1); if(nowres); fc(walk,*actor,0,8,0,1,2); return; fc(walk,*actor,0,8,-1,0,1); return;
#else; fc(dir,*actor,==,2); if(nowres); fc(walk,*actor,0,8,1,0,0); return; fc(walk,*actor,0,8,0,2,2); fc(walk,,0,8,0,0,0); return; fc(walk,*actor,0,8,-1,0,1); return;
#else; endif; endif; endif; fc(walk,*actor,0,8,0,0,3); fc(walk,,0,8,0,0,2);

#fc(dir,*actor,==,0,21); fc(dir,*actor,==,1,22); fc(dir,*actor,==,2,23); goto(20);
#label(21); fc(walk,*actor,0,8,0,1,2); return; fc(walk,*actor,0,8,1,0,0); return; goto(20);
#label(22); fc(walk,*actor,0,8,0,1,2); return; fc(walk,*actor,0,8,-1,0,1); return; goto(20);
#label(23); fc(walk,*actor,0,8,1,0,0); return; fc(walk,*actor,0,8,0,2,2); fc(walk,2,0,8,0,0,0); return; fc(walk,*actor,0,8,-1,0,1); return; goto(20);
#label(20); fc(walk,*actor,0,8,0,0,3); fc(walk,2,0,8,0,0,2);

music(main,=,boss:0);

fc(*actor,pic,==,valanorpa); or; fc(*actor,pic,==,mutou); if(nowres);
text(1,(face=+evfch,swait=-1),om[puقAip[Rcɓ肽ƌȁBȂΈx̂ĂėpĂ낤v);
else;
party(,count,==,1); if(nowres); text(1,(face=+evfch,swait=-1),om[pu₵Ƃ藷ɏI~łĂ낤v);
#party(,count,==,1); if(nowres); text(1,(face=+evfch,swait=-1),om[puƂ藷͐h낤BI~łĂ낤v);
#party(,count,==,1); if(nowres); text(1,(face=+evfch,swait=-1),om[puȂڂIv);
else; text(1,(face=+evfch,swait=-1),om[puȋ𖯂ǂv); endif;
#else; text(1,(face=+evfch,swait=-1),om[puȉǂv); endif;
#else; text(1,(face=+evfch,swait=-1),om[puȒӂǂv); endif;
endif;
#text(1,(face=+evfch,swait=-1),om[puȁv);
#party(,count,==,1); if(nowres); text(1,(face=+evfch,swait=-1),om[puȂڂIv); else; text(1,(face=+evfch,swait=-1),om[puȋ𖯂ǂIv); endif;
fc(*actor,mvable,+0,+1); if(nowres); fc(*actor,walk,0,8,0,1,u); fc(*target,walk,0,8,0,1,d); return; endif;
fc(*actor,walk,0,8,1,0,u); fc(*target,walk,0,8,-1,0,d); return;
fc(*actor,walk,0,8,1,0,u); fc(*target,walk,0,8,-1,0,d); return;
fc(*actor,walk,0,8,0,-1,l); fc(*actor,jump,=,384); fc(*target,walk,0,8,1,0,r); fc(*target,jump,=,384); return;
fc(*actor,walk,0,8,-1,0,l); fc(*target,walk,0,8,1,0,r); return; fcwait(*all);
#battle(om[p,rock-sc, boss,0,,,,, ,, 0,7,82,!);
fade(out,(type=btdefo,color=btdefo,dep=btdefo,rot=btdefo,wait=btdefo)); battle((enegr=om[p,back=rock-sc,bgm=,winbgm=,fade=(type=zoom),stm=0,btm=if|ne,downefc=down5));

evflag(*selected,==,1); if(nowres);
fade(in,);
fc(*actor,walk,0,8,-1,0,l); fc(*target,walk,0,8,1,0,r); return;
fc(*actor,walk,0,8,-1,0,l); fc(*target,walk,0,8,1,0,r); return;
#text(1,(face=+evfch,swait=-1),om[pu΁[[[[[[ȁ[[[IIIIv); sound(attack2); fc(apr,1,=,0);
text(1,(face=+evfch,swait=-1),om[pu΁[[%s4[%s0[[%s4[%s0ȁ[[[IIIIv); fc(*target,picset,fch,org:nrm,=,vala-snf); wait(16); feffect(bomb,,*target,*actor,1); fc(*target,apr,=,0); return;
music(main,=,win:0);
party(,check,l); if(nowres); text(1,(face=*l:nrm,swait=-1),%mem[*l]u%pty[e]͖Gv); endif;
#party(,check,l); if(nowres); text(1,face=*l,%mem[*l]u[Y킾Iv); endif;
#party(,check,l); if(nowres); text(1,face=*l,%mem[*l]u̗͖͂Gv); endif;
#party(,check,l); if(nowres); text(1,face=*l,%mem[*l]uꂪ̗͂v); endif;
#party(,check,l); if(nowres); text(1,face=*l,%mem[*l]uꂪ%memk[*l]̗͂v); endif;
fc(*actor,walk,0,8,1,0,r); return; fc(*actor,walk,0,8,0,0,d); return;
#evflag(main,>=,2,11,); evflag(main,=,2); fc(mvrgn,*actor,|=,C); label(11);
subevent(recover2,); evflagsw(encounton2,=,0);

subevent(valapriv,);
#evflagsw(debug_it_v,=,1);
text(1,(face=uam,swait=-1),om[p|I\nSI\ns\͂gɂI\n%mem[*l]𕔑O悤ɂȂI\n%mem[*la]`%mem[*lKCRca]𕔑ɉ悤ɂȂI\nw%it[*jukebox].nmicxɉyo^ꂽI);
#ϐ}O̎̏ԕt
evflagsw(ct_valaback,=,1);
evflagsw(ct_cuted,==,1); if(nowres); end; endif;
#evflagsw(ex_ending,==,1); if(nowres); select2(reset); select2(+(id=0)); select2(+⑫(id=1)); select2(+Ȃ); select2(*GfBOiHjēx܂H(cid=)); evflag(*selected,==,1); if(nowres); goto(1); endif; evflag(*selected,==,-1); if(nowres); end; endif; endif;
#evflagsw(ex_ending,=,1);
#fade(out,fade,ffc000,255,64); caproll(8,FACON-KYOU,yE摜FACON-KYOU,eXgvC[FACON-KYOU,vO~Oc[Fub{{,MIDI쐬c[FCakewalk,WAVE쐬c[FSWaveAMSںް,`c[FMSyCgAPictBear,THE ,ffff00,00c000,16,4,4,2,ffc000,uamback.bmp); fade(in,fade,ffc000,255,64);
music(main,=,ending:0);
subevent(ending,);
#label(1);
#text(1,(face=uam,swait=-1),w%it[*G].nmicx炱̃X^bt[Aсw%dtp[*face].nmicxw%dtp[*fchpic].nmicxȂǂ悤ɂȂI\nj[́w%sysm[*config].nmicxɂÃGfBȌȗݒ肪ł悤ɂȂI);
text(1,(face=uam,swait=-1),w%it[*G].nmicx炱̃X^bt[Ȃǂ悤ɂȂI\nw%it[*album].nmicxw%dtp[*face].nmicxw%dtp[*fchpic].nmicx悤ɂȂI\nj[́w%sysm[*config].nmicxɂÃGfBȌȗݒ肪ł悤ɂȂI);
#text(1,face=uam,FACON-KYOU\neXgvC[FACON-KYOU\ñQ[͂ł܂łcBI}P܂̂ŁAɂȂ͂ǂB\nmn\n); end;
subevent(@chair,);
#text(1,face=uam,{҂͂ł܂łcBI}PL܂̂ŁAɂ܂ǂiqgsjB\nȂAK̒n̗①ɂ̏Ɂw%ct2i|^%cdxƑłނƁAo[WAbvɂăZ[ugɂȂȂȂĂA̕ӂ̏ԂĊJł܂iÍ͂Pẽp\RłmFł܂jB\r܂A܂Œʂ萅͕Ȃsǂꍇ́Aw%dtp[*item].nmicx́w%ct2%it[*\ݒ].nmic%cdx́w%ct2%sysm[*setwalkrgn].nmic%cdxpB\n͑SłĂD̈ʒu͂̂܂܂ƂȂ܂B);
#w%dtp[*item].nmicx́w%ct2%it[*ړ͈].nmic%cdxpB
#text(1,face=uam,̃Q[͂ł܂łcB\nI}PL܂̂ŁAɂȂ͂ǂiqgscjB\nȂAK̒n̗①ɂ̏Ɂw%c880i|^%cdxƑłނƁAo[WAbvɂăZ[ugɂȂȂȂĂA̕ӂ̏ԂĊJł܂B);
end; endif;

evflag(*selected,==,2); if(nowres);
label(82); fc(*actor,move,31,-20,center); changemap(tB[h); mapname(0); fc(*actor,apr,=,0); fade(in,(type=fade,color=000000,wait=16));
text(1,,ĐE̓ip[BɎxzꂽ̂łB); fade(out,(type=fade,color=000000,wait=32)); subevent(lost,);
#fade(out,(type=fade,color=000000,wait=16));
#evflag(*btres,=,lost); end;
#btres(lost);
#gameover;
end; endif;

#label(5);


#i|j
<napoluni>
subevent(passbattle,); if(nowres); fc(*target,apr,=,0); else;
fade(out,(type=btdefo,color=btdefo,dep=btdefo,rot=btdefo,wait=btdefo)); battle((enegr=i|j,bgm=battle2:0,stm=0,downefc=down3)); fade(in2,);
evflag(*selected,==,1); if(nowres); fc(*target,apr,=,0); end; endif;
#label(1);
evflag(*selected,==,3); if(nowres); fc(*actor,walk,0,8,0,1,u); return; end; endif;
#btres(escaped);
endif;


#֎q
<chair>
text(1,(face=uam,swait=-1),{҂͂ł܂łcBI}PL܂̂ŁAɂ܂ǂiqgsjB\nȂAK̒n̗①ɂ̏Ɂw%ct2i|^%cdxƑłނƁAo[WAbvɂăZ[uf[^gɂȂȂȂĂA̕ӂ̏ԂĊJł܂B\r܂A܂Œʂ萅͕Ȃsǂꍇ́Aj[́w%ct2%sysm[*config].nmic%cdx́w%ct2%sysm[*setwalkrgn].nmic%cdxpB\n͑SłĂD̈ʒu͂̂܂܂ƂȂ܂B);
#iÍ͂Pẽp\RłmFł܂j
#evflagsw(ex_caslin,=,0);
#text(1,face=uam,֎qBɉ悤B);
#text(1,face=uam,Pẽp\RŁAGfBȌȗƈÍ̊mFł悤ɂȂĂ邼I);
#text(1,face=uam,܂ł̈Í́w%ct2i|^%cdxiu|vƁu{v̑łԈႢɂӂjB\nŝnm^neéw%dtp[*item].nmicx́w%ct2%it[*\ݒ].nmic%cdx́w%ct2s͈͂̐ݒ%cdxŉ\B);
#text(1,face=uam,ɐGƁA̋{aɍŏɓ낤Ƃɕ\ꂽoIȂ̂ēxo悤ɂȂ悤B\nȂA܂ł̈Í́w%c880i|^%cdxB);
#``ȕǎ
#\n܂A̐퓬ŕƕCxgIȂ̂oė邪A̐퓬ł͂Cxg͖悤B
#ȂAK̒n̗①ɂ̏Ɂw%c880i|^%cdxƑłނƁAo[WAbvɂăZ[ugɂȂȂȂĂA̕ӂ̏ԂĊJł悤B
#text(1,face=uam,܂A̐퓬ŕƕCxgIȂ̂oė邪A̐퓬ł͂Cxg͖悤B);


#{aSe̔
<door_cs>
fc(*actor,y,<,fc(*target,y)); if(nowres);
#fc(*actor,dir,==,2); or; item(check:eq,caskey,1); if(nowres);
label(1); sound(select); fc(*target,apr,=,0);
else;
item(check:eq,caskey,1); if(nowres); text(1,face=uam,w%it[*caskey].nmicxI); goto(1); endif;
sound(shield); text(1,face=uam,瑤͌|ĂBQêЕ̓̐ɁA̐֍s߂̎d|肻B);
#sound(shield); text(1,face=uam,瑤͌|ĂB̋{âǂɁA̐֍s߂̎d|肻B);
#sound(shield); text(1,face=uam,瑤͌|ĂB̋{âǂɁA̐֍s߂̔肻B͖낤H);
#ɔ肻B
#Е̓ɉ肻B
#Е̓̓˂̏ɁA̐֐iގd|肻B
#炳܂ɉAڂÂ炵Ă悭Ă݂悤B
endif;


#Ŕiɒ򑐁j
<brd_gcyaku>
text(1,face=+evfch,q]A茳sAph̔̒ɖ肵AXȂ]ڊo߂邾낤B);
#text(1,face=+evfch,q]sAph̔̒ɖ肵AXȂ]ڊo߂邾낤B);
zukan(item:gchyaku,==,1); if(nowres); text(1,face=uam,w%it[*gchyaku].nmicxQbg邽߂̓䂩悤B); endif;
#item(check:aleq|alpt|bank,gchyaku,1); or; item(check:eq,gchyaku{{,1);
#item(check:aleq|alpt|bank,gchyaku,1); if(nowres); text(0,w%it[*gchyaku].nmicx͊ɃQbgĂB); endif;
#item(check:aleq|alpt|bank,gchyaku,1); if(nowres); text(1,,ɃQbgwgchyakuxɂĂ̏̂悤B); endif;


#Ŕi^̎Rj
<brd_evitem>
#text(1,face=+evfch,鋫ɕׂɂ͐Ȃ󂪕KvB쐼ij̎R֐B);
text(1,face=+evfch,鋫ɕׂɂ͐Ȃ󂪕KvB쐼ijɔ邳ꂵR֐ׂB);
#ɔ邳ꂵ
#item(check:2,,1); and; item(check:2,,1); if(nowres); text(0,͊ɒBĂB); endif;
#item(check:aleq|alpt|bank,̈,1); or; item(check:aleq|alpt|bank,,1); if(nowres); text(0,͊ɒBĂB); endif;
#item(check:aleq|alpt|bank,̈,1); or; item(check:aleq|alpt|bank,,1); if(nowres); text(1,face=uam,̎͊ɒBĂB); endif;
zukan(item:̈,==,1); if(nowres); text(1,face=uam,w%it[*̈].nmicx^邽߂̎悤B); endif;
#item(check:aleq|alpt|bank,̈,1); or; item(check:aleq|alpt|bank,,1);
zukan(warppos:*all,&,hyper); if(nowres); text(1,face=uam,w鋫xƂ̓nCp[v[̎悤B); endif;
#zukan(warppos:*all,&,hyper); if(nowres); text(0,鋫Ƃ̓nCp[v[̎悤B); endif;
#item(check:aleq|alpt|bank,̈,1); or; item(check:aleq|alpt|bank,,1); if(nowres); text(1,,ɊlẅxɂĂ̏̂悤B); endif;
#text(1,face=+evfch,鋫ɕׂɂ͍XȂ鐹Ȃ͂KvB쐼ij̎R֐B);
#ǂ̏ꍇA͂ĂĂĂȂĂǂB